MacTech 1 to 12

home *** CD-ROM | disk | FTP | other *** search
/ MacTech 1 to 12 / MacTech-vol-1-12.toast / Source / MacTech® Magazine / Volume 02 - 1986 / 02.08 Aug 86.sit / 02.08 Aug 86 / pascal / RegMDEF Source / RegMDEFGlue.Asm < prev next >
MacBinary | 1986-06-13 | 3.9 KB | [TEXT/EDIT]
open in:
MacOS 8.1 extracted |
Win98 extracted |
DOS extracted
browse contents |
view JSON data |
view as text

This file was processed as: MacBinary (archive/macBinary).
Confidence	Program	Detection	Match Type	Support
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, inited, Thu Jun 12 21:49:40 1986, modified Thu Jun 12 21:49:40 1986, creator Macintosh Edit, type ASCII, 3345 bytes "RegMDEFGlue.Asm" Generic INItialization configuration [word], at 0xd91 348 bytes resource Generic INItialization configuration [word]	default (weak)
`99%`	file	data	default
`74%`	TrID	Macintosh plain text (MacBinary)	default
`25%`	TrID	MacBinary 2	default (weak)
`100%`	siegfried	fmt/1762 MacBinary (II)	default
`100%`	lsar	MacBinary	default
id metadata
key	value
macFileType	`[TEXT]`
macFileCreator	`[EDIT]`
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0f 52 65 67 4d 44 45 | 46 47 6c 75 65 2e 41 73 |..RegMDE|FGlue.As|
|00000010| 6d 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |m.......|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 45 44 49 | 54 01 00 00 00 00 00 00 |.TEXTEDI|T.......|
|00000050| 00 00 00 00 00 0d 11 00 | 00 01 5c 9b 15 2c b4 9b |........|..\..,..|
|00000060| 15 2c b4 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.,......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 44 26 00 00 |........|....D&..|
|00000080| 3b 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |;#######|########|
|00000090| 23 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |########|########|
|000000a0| 23 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |########|########|
|000000b0| 23 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |########|########|
|000000c0| 23 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |########|########|
|000000d0| 23 0d 3b 23 09 09 09 09 | 09 09 09 09 09 09 23 0d |#.;#....|......#.|
|000000e0| 3b 23 09 70 72 6f 63 65 | 64 75 72 65 20 47 65 74 |;#.proce|dure Get|
|000000f0| 49 74 65 6d 4b 65 79 28 | 74 68 65 4d 65 6e 75 20 |ItemKey(|theMenu |
|00000100| 3a 20 4d 65 6e 75 48 61 | 6e 64 6c 65 3b 09 09 09 |: MenuHa|ndle;...|
|00000110| 09 23 0d 3b 23 09 09 09 | 09 74 68 65 49 74 65 6d |.#.;#...|.theItem|
|00000120| 20 3a 20 49 6e 74 65 67 | 65 72 3b 09 09 09 09 23 | : Integ|er;....#|
|00000130| 0d 3b 23 09 09 09 09 76 | 61 72 20 74 68 65 43 68 |.;#....v|ar theCh|
|00000140| 61 72 20 3a 20 43 68 61 | 72 29 3b 09 09 09 09 23 |ar : Cha|r);....#|
|00000150| 0d 3b 23 09 09 09 09 09 | 09 09 09 09 09 23 0d 3b |.;#.....|.....#.;|
|00000160| 23 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |#-------|--------|
|00000170| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000180| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000190| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000001a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 23 |--------|-------#|
|000001b0| 0d 3b 23 09 09 09 09 09 | 09 09 09 09 09 23 0d 3b |.;#.....|.....#.;|
|000001c0| 23 09 54 68 69 73 20 61 | 73 73 65 6d 62 6c 79 20 |#.This a|ssembly |
|000001d0| 70 72 6f 63 20 72 65 74 | 75 72 6e 73 20 74 68 65 |proc ret|urns the|
|000001e0| 20 63 75 72 72 65 6e 74 | 20 63 6f 6d 6d 61 6e 64 | current| command|
|000001f0| 20 6b 65 79 20 77 68 69 | 63 68 20 69 73 20 61 73 | key whi|ch is as|
|00000200| 73 69 67 6e 65 64 09 23 | 0d 3b 23 09 74 6f 20 74 |signed.#|.;#.to t|
|00000210| 68 65 49 74 65 6d 2e 09 | 09 09 09 09 09 09 09 23 |heItem..|.......#|
|00000220| 0d 3b 23 09 09 09 09 09 | 09 09 09 09 09 23 0d 3b |.;#.....|.....#.;|
|00000230| 23 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |########|########|
|00000240| 23 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |########|########|
|00000250| 23 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |########|########|
|00000260| 23 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |########|########|
|00000270| 23 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |########|########|
|00000280| 0d 0d 3b 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..;-----|--------|
|00000290| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000002a0| 2d 2d 2d 2d 2d 2d 2d 20 | 45 71 75 61 74 65 73 20 |------- |Equates |
|000002b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000002c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000002d0| 2d 2d 2d 0d 0d 3b 20 6d | 65 6e 75 69 6e 66 6f 20 |---..; m|enuinfo |
|000002e0| 64 61 74 61 20 73 74 72 | 75 63 74 75 72 65 0d 0d |data str|ucture..|
|000002f0| 09 6d 65 6e 75 49 44 09 | 09 65 71 75 09 30 09 3b |.menuID.|.equ.0.;|
|00000300| 20 75 6e 69 71 75 65 20 | 69 64 20 66 6f 72 20 6d | unique |id for m|
|00000310| 65 6e 75 20 62 61 72 20 | 5b 77 6f 72 64 5d 0d 09 |enu bar |[word]..|
|00000320| 6d 65 6e 75 57 69 64 74 | 68 09 65 71 75 09 32 09 |menuWidt|h.equ.2.|
|00000330| 3b 20 6d 65 6e 75 20 57 | 69 64 74 68 20 5b 77 6f |; menu W|idth [wo|
|00000340| 72 64 5d 0d 09 6d 65 6e | 75 48 65 69 67 68 74 09 |rd]..men|uHeight.|
|00000350| 65 71 75 09 34 09 3b 20 | 6d 65 6e 75 20 48 65 69 |equ.4.; |menu Hei|
|00000360| 67 68 74 20 5b 77 6f 72 | 64 5d 0d 09 6d 65 6e 75 |ght [wor|d]..menu|
|00000370| 44 65 66 48 61 6e 64 6c | 65 09 65 71 75 09 36 09 |DefHandl|e.equ.6.|
|00000380| 3b 20 6d 65 6e 75 20 64 | 65 66 69 6e 69 74 69 6f |; menu d|efinitio|
|00000390| 6e 20 70 72 6f 63 20 5b | 68 61 6e 64 6c 65 5d 0d |n proc [|handle].|
|000003a0| 09 6d 65 6e 75 45 6e 61 | 62 6c 65 09 65 71 75 09 |.menuEna|ble.equ.|
|000003b0| 24 41 09 3b 20 65 6e 61 | 62 6c 65 20 66 6c 61 67 |$A.; ena|ble flag|
|000003c0| 73 2c 20 6f 6e 65 20 62 | 69 74 2f 69 74 65 6d 20 |s, one b|it/item |
|000003d0| 5b 6c 6f 6e 67 5d 0d 09 | 6d 65 6e 75 44 61 74 61 |[long]..|menuData|
|000003e0| 09 65 71 75 09 24 45 09 | 3b 20 6d 65 6e 75 20 69 |.equ.$E.|; menu i|
|000003f0| 74 65 6d 20 73 74 72 69 | 6e 67 20 5b 73 74 72 69 |tem stri|ng [stri|
|00000400| 6e 67 5d 0d 09 6d 65 6e | 75 42 6c 6b 53 69 7a 65 |ng]..men|uBlkSize|
|00000410| 09 65 71 75 09 24 45 09 | 3b 20 73 69 7a 65 20 6f |.equ.$E.|; size o|
|00000420| 66 20 61 20 6d 65 6e 75 | 20 62 6c 6f 63 6b 20 70 |f a menu| block p|
|00000430| 6c 75 73 20 64 61 74 61 | 53 74 72 69 6e 67 0d 0d |lus data|String..|
|00000440| 3b 20 6d 65 6e 75 20 73 | 74 72 69 6e 67 20 64 61 |; menu s|tring da|
|00000450| 74 61 20 73 74 72 75 63 | 74 75 72 65 0d 0d 09 69 |ta struc|ture...i|
|00000460| 74 65 6d 49 63 6f 6e 09 | 65 71 75 09 30 09 3b 20 |temIcon.|equ.0.; |
|00000470| 69 63 6f 6e 20 62 79 74 | 65 0d 09 69 74 65 6d 43 |icon byt|e..itemC|
|00000480| 6d 64 09 09 65 71 75 09 | 31 09 3b 20 63 6f 6d 6d |md..equ.|1.; comm|
|00000490| 61 6e 64 20 6b 65 79 20 | 62 79 74 65 0d 09 69 74 |and key |byte..it|
|000004a0| 65 6d 4d 61 72 6b 09 65 | 71 75 09 32 09 3b 20 63 |emMark.e|qu.2.; c|
|000004b0| 68 65 63 6b 6d 61 72 6b | 20 63 68 61 72 61 63 74 |heckmark| charact|
|000004c0| 65 72 20 62 79 74 65 0d | 09 69 74 65 6d 53 74 79 |er byte.|.itemSty|
|000004d0| 6c 65 09 65 71 75 09 33 | 09 3b 20 73 74 79 6c 65 |le.equ.3|.; style|
|000004e0| 20 62 79 74 65 0d 0d 09 | 2e 54 72 61 70 09 5f 43 | byte...|.Trap._C|
|000004f0| 6f 75 6e 74 4d 49 74 65 | 6d 73 09 24 41 39 35 30 |ountMIte|ms.$A950|
|00000500| 09 3b 20 74 72 61 70 20 | 77 6f 72 64 20 0d 0d 3b |.; trap |word ..;|
|00000510| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000520| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000530| 2d 2d 2d 2d 20 58 52 45 | 46 27 73 20 2d 2d 2d 2d |---- XRE|F's ----|
|00000540| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000550| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000560| 0d 0d 09 78 64 65 66 09 | 47 65 74 49 74 65 6d 4b |...xdef.|GetItemK|
|00000570| 65 79 09 09 3b 20 73 6f | 20 74 68 65 20 6c 69 6e |ey..; so| the lin|
|00000580| 6b 65 72 20 77 69 6c 6c | 20 66 69 6e 64 20 75 73 |ker will| find us|
|00000590| 0d 0d 3b 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..;-----|--------|
|000005a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005b0| 2d 2d 2d 2d 2d 2d 20 45 | 6e 74 72 61 6e 63 65 20 |------ E|ntrance |
|000005c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005e0| 2d 2d 2d 0d 0d 47 65 74 | 49 74 65 6d 4b 65 79 3a |---..Get|ItemKey:|
|000005f0| 0d 09 6c 69 6e 6b 09 41 | 36 2c 23 30 09 09 09 3b |..link.A|6,#0...;|
|00000600| 20 63 72 65 61 74 65 20 | 6e 65 77 20 73 74 61 63 | create |new stac|
|00000610| 6b 20 66 72 61 6d 65 0d | 09 6d 6f 76 65 6d 2e 6c |k frame.|.movem.l|
|00000620| 09 41 30 2d 41 34 2f 44 | 30 2d 44 33 2c 2d 28 53 |.A0-A4/D|0-D3,-(S|
|00000630| 50 29 09 3b 20 73 61 76 | 65 20 72 65 67 69 73 74 |P).; sav|e regist|
|00000640| 65 72 73 0d 0d 3b 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |ers..;--|--------|
|00000650| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000660| 2d 2d 2d 2d 2d 20 50 6f | 70 20 50 61 72 61 6d 65 |----- Po|p Parame|
|00000670| 74 65 72 73 20 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |ters ---|--------|
|00000680| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000690| 2d 2d 2d 2d 2d 2d 0d 0d | 09 63 6c 72 2e 6c 09 44 |------..|.clr.l.D|
|000006a0| 32 09 09 09 3b 20 6d 61 | 6b 65 20 73 75 72 65 20 |2...; ma|ke sure |
|000006b0| 69 74 20 69 73 20 65 6d | 70 74 79 0d 09 63 6c 72 |it is em|pty..clr|
|000006c0| 2e 6c 09 44 31 09 09 09 | 3b 20 64 69 74 74 6f 2e |.l.D1...|; ditto.|
|000006d0| 2e 2e 0d 09 63 6c 72 2e | 6c 09 44 30 09 09 09 3b |....clr.|l.D0...;|
|000006e0| 20 64 69 74 74 6f 2e 2e | 2e 0d 0d 09 63 6c 72 2e | ditto..|....clr.|
|000006f0| 77 09 2d 28 53 50 29 09 | 09 09 3b 20 6d 61 6b 65 |w.-(SP).|..; make|
|00000700| 20 72 6f 6f 6d 20 66 6f | 72 20 72 65 73 75 6c 74 | room fo|r result|
|00000710| 0d 09 6d 6f 76 65 2e 6c | 09 31 34 28 41 36 29 2c |..move.l|.14(A6),|
|00000720| 2d 28 53 50 29 09 09 3b | 20 70 75 73 68 20 4d 65 |-(SP)..;| push Me|
|00000730| 6e 75 48 61 6e 64 6c 65 | 0d 09 5f 43 6f 75 6e 74 |nuHandle|.._Count|
|00000740| 4d 49 74 65 6d 73 09 09 | 09 3b 20 68 6f 77 20 6d |MItems..|.; how m|
|00000750| 61 6e 79 20 61 72 65 20 | 69 6e 20 74 68 69 73 20 |any are |in this |
|00000760| 6d 65 6e 75 3f 0d 09 6d | 6f 76 65 2e 77 09 28 53 |menu?..m|ove.w.(S|
|00000770| 50 29 2b 2c 44 33 09 09 | 3b 20 70 6f 70 20 72 65 |P)+,D3..|; pop re|
|00000780| 73 75 6c 74 0d 0d 09 6d | 6f 76 65 2e 6c 09 31 34 |sult...m|ove.l.14|
|00000790| 28 41 36 29 2c 41 34 09 | 09 3b 20 66 65 74 63 68 |(A6),A4.|.; fetch|
|000007a0| 20 74 68 65 20 6d 65 6e | 75 20 68 61 6e 64 6c 65 | the men|u handle|
|000007b0| 0d 09 6d 6f 76 65 2e 77 | 09 31 32 28 41 36 29 2c |..move.w|.12(A6),|
|000007c0| 44 31 09 09 3b 20 66 65 | 74 63 68 20 74 68 65 20 |D1..; fe|tch the |
|000007d0| 69 74 65 6d 20 6e 75 6d | 62 65 72 0d 09 6d 6f 76 |item num|ber..mov|
|000007e0| 65 61 2e 6c 09 38 28 41 | 36 29 2c 41 33 09 09 3b |ea.l.8(A|6),A3..;|
|000007f0| 20 66 65 74 63 68 20 70 | 74 72 20 74 6f 20 74 68 | fetch p|tr to th|
|00000800| 65 20 63 68 61 72 20 50 | 74 72 28 77 6f 72 64 29 |e char P|tr(word)|
|00000810| 0d 0d 09 63 6d 70 2e 77 | 09 44 31 2c 44 33 09 09 |...cmp.w|.D1,D3..|
|00000820| 09 3b 20 69 73 20 6e 75 | 6d 20 4f 66 20 4d 65 6e |.; is nu|m Of Men|
|00000830| 75 20 49 74 65 6d 73 20 | 3c 20 74 68 65 49 74 65 |u Items |< theIte|
|00000840| 6d 0d 09 62 6c 74 09 42 | 61 64 49 74 65 6d 09 09 |m..blt.B|adItem..|
|00000850| 09 3b 20 79 65 70 2c 20 | 65 78 69 74 0d 0d 3b 2d |.; yep, |exit..;-|
|00000860| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000870| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 20 46 69 |--------|----- Fi|
|00000880| 6e 64 20 74 68 65 20 43 | 6d 64 20 4b 65 79 20 2d |nd the C|md Key -|
|00000890| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000008a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |--------|-------.|
|000008b0| 0d 09 6d 6f 76 65 2e 6c | 09 28 41 34 29 2c 41 34 |..move.l|.(A4),A4|
|000008c0| 09 09 09 3b 20 67 65 74 | 20 6d 65 6e 75 20 70 74 |...; get| menu pt|
|000008d0| 72 0d 09 6c 65 61 09 6d | 65 6e 75 44 61 74 61 28 |r..lea.m|enuData(|
|000008e0| 41 34 29 2c 41 34 09 09 | 3b 20 6e 6f 77 20 41 34 |A4),A4..|; now A4|
|000008f0| 20 70 6f 69 6e 74 73 20 | 74 6f 20 74 68 65 20 6d | points |to the m|
|00000900| 65 6e 75 20 74 69 74 6c | 65 0d 09 6d 6f 76 65 2e |enu titl|e..move.|
|00000910| 62 09 28 41 34 29 2c 44 | 32 09 09 09 3b 20 67 65 |b.(A4),D|2...; ge|
|00000920| 74 20 6c 65 6e 67 74 68 | 20 6f 66 20 6d 65 6e 75 |t length| of menu|
|00000930| 20 74 69 74 6c 65 0d 09 | 61 64 64 2e 62 09 23 31 | title..|add.b.#1|
|00000940| 2c 44 32 09 09 09 3b 20 | 73 6b 69 70 20 6c 65 6e |,D2...; |skip len|
|00000950| 67 74 68 20 62 79 74 65 | 0d 0d 3b 20 28 41 34 2c |gth byte|..; (A4,|
|00000960| 44 32 29 20 6e 6f 77 20 | 70 6f 69 6e 74 73 20 74 |D2) now |points t|
|00000970| 6f 20 74 68 65 20 66 69 | 72 73 74 20 6d 65 6e 75 |o the fi|rst menu|
|00000980| 20 69 74 65 6d 73 20 74 | 69 74 6c 65 20 28 6c 65 | items t|itle (le|
|00000990| 6e 67 74 68 20 62 79 74 | 65 29 0d 0d 6e 65 78 74 |ngth byt|e)..next|
|000009a0| 49 74 65 6d 3a 0d 09 73 | 75 62 2e 62 09 23 31 2c |Item:..s|ub.b.#1,|
|000009b0| 44 31 09 09 09 3b 20 64 | 65 63 72 65 6d 65 6e 74 |D1...; d|ecrement|
|000009c0| 20 63 6f 75 6e 74 0d 09 | 62 65 71 09 47 6f 74 49 | count..|beq.GotI|
|000009d0| 74 65 6d 09 09 09 3b 20 | 69 66 20 30 2c 20 72 65 |tem...; |if 0, re|
|000009e0| 74 75 72 6e 20 69 74 73 | 20 63 6d 64 20 63 68 61 |turn its| cmd cha|
|000009f0| 72 0d 09 6d 6f 76 65 2e | 62 09 28 41 34 2c 44 32 |r..move.|b.(A4,D2|
|00000a00| 29 2c 44 30 09 09 3b 20 | 67 65 74 20 6c 65 6e 67 |),D0..; |get leng|
|00000a10| 74 68 20 6f 66 20 74 68 | 65 20 74 69 74 6c 65 0d |th of th|e title.|
|00000a20| 09 61 64 64 09 44 30 2c | 44 32 09 09 09 3b 20 61 |.add.D0,|D2...; a|
|00000a30| 6e 64 20 73 6b 69 70 20 | 69 74 0d 09 61 64 64 09 |nd skip |it..add.|
|00000a40| 23 35 2c 44 32 09 09 09 | 3b 20 73 6b 69 70 20 74 |#5,D2...|; skip t|
|00000a50| 68 65 20 69 74 65 6d 20 | 61 74 74 72 69 62 75 74 |he item |attribut|
|00000a60| 65 73 20 26 20 6c 65 6e | 67 74 68 20 62 79 74 65 |es & len|gth byte|
|00000a70| 0d 09 62 72 61 09 6e 65 | 78 74 49 74 65 6d 09 09 |..bra.ne|xtItem..|
|00000a80| 3b 20 61 6e 64 20 6c 6f | 6f 6b 20 61 74 20 74 68 |; and lo|ok at th|
|00000a90| 65 20 6e 65 78 74 20 69 | 74 65 6d 0d 0d 3b 2d 2d |e next i|tem..;--|
|00000aa0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000ab0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 20 47 |--------|------ G|
|00000ac0| 6f 74 20 74 68 65 20 49 | 74 65 6d 20 2d 2d 2d 2d |ot the I|tem ----|
|00000ad0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000ae0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 0d |--------|------..|
|00000af0| 47 6f 74 49 74 65 6d 3a | 0d 09 6d 6f 76 65 2e 62 |GotItem:|..move.b|
|00000b00| 09 28 41 34 2c 44 32 29 | 2c 44 30 09 09 3b 20 67 |.(A4,D2)|,D0..; g|
|00000b10| 65 74 20 6c 65 6e 67 74 | 68 20 6f 66 20 74 69 74 |et lengt|h of tit|
|00000b20| 6c 65 0d 09 61 64 64 09 | 44 30 2c 44 32 09 09 09 |le..add.|D0,D2...|
|00000b30| 3b 20 61 6e 64 20 73 6b | 69 70 20 69 74 0d 09 61 |; and sk|ip it..a|
|00000b40| 64 64 09 23 31 2c 44 32 | 09 09 09 3b 20 73 6b 69 |dd.#1,D2|...; ski|
|00000b50| 70 20 6c 65 6e 67 74 68 | 20 62 79 74 65 2c 20 74 |p length| byte, t|
|00000b60| 6f 6f 2e 2e 2e 0d 09 63 | 6c 72 2e 77 09 44 30 09 |oo.....c|lr.w.D0.|
|00000b70| 09 09 3b 20 6d 61 6b 65 | 20 73 75 72 65 20 69 74 |..; make| sure it|
|00000b80| 73 20 65 6d 70 74 79 0d | 09 6d 6f 76 65 2e 62 09 |s empty.|.move.b.|
|00000b90| 69 74 65 6d 43 6d 64 28 | 41 34 2c 44 32 29 2c 44 |itemCmd(|A4,D2),D|
|00000ba0| 30 09 3b 20 67 65 74 20 | 74 68 65 20 6b 65 79 20 |0.; get |the key |
|00000bb0| 65 71 75 69 76 61 6c 65 | 6e 74 0d 09 6d 6f 76 65 |equivale|nt..move|
|00000bc0| 2e 77 09 44 30 2c 28 41 | 33 29 09 09 09 3b 20 61 |.w.D0,(A|3)...; a|
|00000bd0| 6e 64 20 72 65 74 75 72 | 6e 20 69 74 0d 09 62 72 |nd retur|n it..br|
|00000be0| 61 09 45 78 69 74 09 09 | 09 3b 20 61 6e 64 20 65 |a.Exit..|.; and e|
|00000bf0| 78 69 74 0d 0d 3b 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |xit..;--|--------|
|00000c00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000c10| 2d 2d 2d 2d 2d 2d 20 4e | 6f 20 49 74 65 6d 20 46 |------ N|o Item F|
|00000c20| 6f 75 6e 64 20 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |ound ---|--------|
|00000c30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000c40| 2d 2d 2d 2d 2d 2d 0d 0d | 42 61 64 49 74 65 6d 3a |------..|BadItem:|
|00000c50| 0d 09 63 6c 72 2e 77 09 | 28 41 33 29 09 09 09 3b |..clr.w.|(A3)...;|
|00000c60| 20 72 65 74 75 72 6e 20 | 6e 6f 20 63 6d 64 20 63 | return |no cmd c|
|00000c70| 68 61 72 20 61 6e 64 20 | 65 78 69 74 0d 09 0d 3b |har and |exit...;|
|00000c80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000c90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 20 |--------|------- |
|00000ca0| 43 6c 65 61 6e 20 55 70 | 20 26 20 45 78 69 74 20 |Clean Up| & Exit |
|00000cb0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000cc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000cd0| 0d 0d 45 78 69 74 3a 0d | 09 6d 6f 76 65 6d 2e 6c |..Exit:.|.movem.l|
|00000ce0| 09 28 53 50 29 2b 2c 41 | 30 2d 41 34 2f 44 30 2d |.(SP)+,A|0-A4/D0-|
|00000cf0| 44 33 09 3b 20 72 65 73 | 74 6f 72 65 20 72 65 67 |D3.; res|tore reg|
|00000d00| 69 73 74 65 72 73 0d 09 | 75 6e 6c 6b 09 41 36 09 |isters..|unlk.A6.|
|00000d10| 09 09 3b 20 72 65 73 74 | 6f 72 65 20 73 74 61 63 |..; rest|ore stac|
|00000d20| 6b 20 66 72 61 6d 65 0d | 09 6d 6f 76 65 61 2e 6c |k frame.|.movea.l|
|00000d30| 09 28 53 50 29 2b 2c 41 | 30 09 09 3b 20 73 61 76 |.(SP)+,A|0..; sav|
|00000d40| 65 20 72 65 74 75 72 6e | 20 61 64 64 72 65 73 73 |e return| address|
|00000d50| 0d 09 61 64 64 61 2e 6c | 09 23 31 30 2c 53 50 09 |..adda.l|.#10,SP.|
|00000d60| 09 09 3b 20 63 6c 65 61 | 6e 20 75 70 20 73 74 61 |..; clea|n up sta|
|00000d70| 63 6b 0d 09 6a 6d 70 09 | 28 41 30 29 09 09 09 3b |ck..jmp.|(A0)...;|
|00000d80| 20 2e 2e 2e 20 61 6e 64 | 20 72 65 74 75 72 6e 0d | ... and| return.|
|00000d90| 0d 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000da0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000db0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000dc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000dd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000de0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000df0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e00| 00 00 01 00 00 00 01 16 | 00 00 00 16 00 00 00 46 |........|.......F|
|00000e10| 64 2e 00 00 00 00 90 00 | 07 00 00 00 00 00 84 00 |d.......|........|
|00000e20| da 00 96 01 20 04 04 53 | 61 76 65 00 00 00 00 00 |.... ..S|ave.....|
|00000e30| 0f 52 65 67 4d 44 45 46 | 47 6c 75 65 2e 41 73 6d |.RegMDEF|Glue.Asm|
|00000e40| 02 00 00 00 54 45 58 54 | 45 44 49 54 01 00 00 3c |....TEXT|EDIT...<|
|00000e50| 00 00 54 45 58 54 45 44 | 49 54 01 00 00 3c 00 46 |..TEXTED|IT...<.F|
|00000e60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e70| 00 00 9a ce 9a 48 00 00 | 0d 11 00 00 01 5c da 00 |.....H..|.....\..|
|00000e80| 64 01 20 04 05 44 72 69 | 76 65 00 00 00 00 00 00 |d. ..Dri|ve......|
|00000e90| 9d 00 11 00 ad 00 c2 10 | 00 00 00 00 00 00 1d 00 |........|........|
|00000ea0| 0e 00 7f 00 c5 80 00 00 | 00 00 aa 00 09 00 00 00 |........|........|
|00000eb0| 00 00 8a 01 00 00 9c 01 | 50 04 04 4f 70 65 6e 00 |........|P..Open.|
|00000ec0| 00 00 00 04 80 00 3b 04 | d0 00 4d 04 06 48 69 64 |......;.|..M..Hid|
|00000ed0| 64 65 6e 00 00 00 00 00 | a3 01 00 00 b5 01 50 04 |den.....|......P.|
|00000ee0| 06 43 61 6e 63 65 6c 00 | 00 00 00 00 27 00 e8 00 |.Cancel.|....'...|
|00000ef0| 3b 01 5b 80 00 00 00 00 | 00 00 44 01 00 00 56 01 |;.[.....|..D...V.|
|00000f00| 00 00 00 0a 00 09 06 4d | 6f 6e 61 63 6f 00 00 00 |.......M|onaco...|
|00000f10| 00 04 00 06 00 08 00 00 | 01 00 00 00 01 16 00 00 |........|........|
|00000f20| 00 16 00 00 00 46 00 00 | cc 24 03 50 00 00 00 1c |.....F..|.$.P....|
|00000f30| 00 46 00 01 45 46 4e 54 | 00 00 00 12 45 54 41 42 |.F..EFNT|....ETAB|
|00000f40| 00 00 00 1e 03 eb ff ff | 00 00 00 00 00 01 91 08 |........|........|
|00000f50| 03 ec ff ff 00 00 00 0e | 00 01 91 74 00 00 00 00 |........|...t....|
|00000f60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+